home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Aktuell
/
Amiga Aktuell.iso
/
libs
/
evaluate.table
< prev
next >
Wrap
Text File
|
1996-09-05
|
6KB
|
156 lines
; Lookup tables for Laplace V0.5 (10-JUL-1996)
; --------------------------------------------------------------------------
; You should not modify this file on your own. Even if you think you can!!
; The file structure is not documented, and will change in future releases!
; identifiers
; E - Evaluate
; S - Simplify
; classes
; R - Real
; V - Vector
; M - Matrix
; flags - objects
; a - atomar
; b - nonatomar
; p - positive
; n - negative
; e - even
; o - odd
; c - no constant
; r - reference
; flags - operators
; c - not commutative
; a - not associative
; d - deep search
ES: ABS(ABS(1)) = ABS(1)
ES: ABS(NEG(1)) = ABS(1)
ES: ABS(SIGN(1)) = $1/1
ES: ACOS(COS(1)) = 1
ES: ACOSH(COSH(1)) = 1
ES: ACOT(ACOT(1)) = 1
ES: ADD($0/1,1) = 1
;ES: ADD(1,ADD(NEG(1),2)) = 2
S: ADD(MUL:d(1,2),1) = MUL(1,ADD($1/1,2))
S: ADD(MUL(1,2),MUL(1,3)) = MUL(1,ADD(2,3))
ES: ADD(POT(SIN(1),$2/1),POT(COS(1),$2/1)) = $1/1
ES: ADD(POT(COSH(1),$2/1),NEG(POT(SINH(1),$2/1))) = $1/1
;ES: ADD:a(1:ac,ADD(2:ac,3)) = ADD(ADD(1,2),3)
;ES: ADD:a(1:b,ADD(2:ac,3)) = ADD(2,ADD(1,3))
;ES: ADD:c(1:b,2:a) = ADD(2,1)
ES: ADD(LN(1),LN(2)) = LN(MUL(1,2))
S: ADD(LN(1),NEG(LN(2))) = LN(MUL(1,INV(2)))
S: ADD(MUL(COS(1),COS(2)),NEG(MUL(SIN(1),SIN(2)))) = COS(ADD(1,2))
S: ADD(MUL(SINH(1),COSH(2)),MUL(COSH(1),SINH(2))) = SINH(ADD(1,2))
S: ADD(MUL(SIN(1),COS(2)),MUL(COS(1),SIN(2))) = SIN(ADD(1,2))
S: ADD(MUL(COSH(1),COSH(2)),MUL(SINH(1),SINH(2))) = COSH(ADD(1,2))
;ES: ADD:sa(1,ADD(2,3)) = ADD(ADD(1,2),3)
;ES: ADD:sa(ADD(1,2),ADD(3,4)) = ADD(ADD(ADD(1,2),3),4)
ES: ASIN(SIN(1)) = 1
ES: ASIN(SINH(1)) = 1
ES: ATAN(TAN(1)) = 1
ES: ATANH(TANH(1)) = 1
ES: COS(ACOS(1)) = 1
ES: COS(NEG(1)) = COS(1)
E: COS(ADD(1,2)) = ADD(MUL(COS(1),COS(2)),NEG(MUL(SIN(1),SIN(2))))
ES: COSH(ACOSH(1)) = 1
ES: COSH(NEG(1)) = COSH(1)
E: COSH(ADD(1,2)) = ADD(MUL(COSH(1),COSH(2)),MUL(SINH(1),SINH(2)))
E: COT(1) = MUL(COS(1),INV(SIN(1)))
ES: COT(ACOT(1)) = 1
E: DIFF(ABS(1),2) = MUL(SIGN(1),DIFF(1,2))
E: DIFF(ACOS(1),2) = MUL(NEG(MUL($1/1,POT(ADD(1,NEG(POT(1,$2/1))),$-1/2))),DIFF(1,2))
E: DIFF(ACOSH(1),2) = MUL(POT(ADD($-1/1,POT(1,$2/1)),$-1/2),DIFF(1,2))
E: DIFF(ACOT(1),2) = MUL(NEG(POT(ADD($1/1,POT(1,$2/1)),$-1/1)),DIFF(1,2))
E: DIFF(ADD(1,2),3) = ADD(DIFF(1,3),DIFF(2,3))
E: DIFF(ASIN(1),2) = MUL(POT(ADD(1,NEG(POT(1,$2/1))),$-1/2),DIFF(1,2))
E: DIFF(ASINH(1),2) = MUL(POT(ADD($1/1,POT(1,$2/1)),$-1/2),DIFF(1,2))
E: DIFF(ATAN(1),2) = MUL(POT(ADD($1/1,POT(1,$2/1)),$-1/1),DIFF(1,2))
E: DIFF(ATANH(1),2) = MUL(POT(ADD($1/1,NEG(POT(1,$2/1))),$-1/1),DIFF(1,2))
E: DIFF(COS(1),2) = MUL(NEG(SIN(1)),DIFF(1,2))
E: DIFF(COSH(1),2) = MUL(SINH(1),DIFF(1,2))
E: DIFF(COT(1),2) = MUL(ADD($-1/1,NEG(POT(COT(1),$2/1))),DIFF(1,2))
E: DIFF(EXP(1),2) = MUL(EXP(1),DIFF(1,2))
E: DIFF(INV(1),2) = NEG(MUL(POT(1,$-2/1),DIFF(1,2)))
E: DIFF(LN(1),2) = MUL(POT(1,$-1/1),DIFF(1,2))
E: DIFF(LOG(1),2) = MUL(POT(MUL($10/1,1),$-1/1),DIFF(1,2))
E: DIFF(MUL(1,2),3) = ADD(MUL(1,DIFF(2,3)),MUL(DIFF(1,3),2))
E: DIFF(NEG(1),2) = NEG(DIFF(1,2))
E: DIFF(POT(1,2:Rb),3) = ADD(MUL(POT(1,2),MUL(2,POT(1,$-1/1))),MUL(POT(1,2),MUL(LN(1),DIFF(2,3))))
E: DIFF(POT(1,2:Ra),3) = MUL(MUL(2,POT(1,ADD(2,$-1/1))),DIFF(1,3))
E: DIFF(SIGN(1),2) = $0/1
E: DIFF(SIN(1),2) = MUL(COS(1),DIFF(1,2))
E: DIFF(SINH(1),2) = MUL(COSH(1),DIFF(1,2))
E: DIFF(SQRT(1),2) = MUL(MUL($1/2,POT(1,$-1/2)),DIFF(1,2))
E: DIFF(TAN(1),2) = MUL(ADD($1/1,POT(TAN(1),$2/1)),DIFF(1,2))
E: DIFF(TANH(1),2) = MUL(POT(COSH(1),$-2/1),DIFF(1,2))
E: DIFF(1:Ra,2) = $0/1
E: DIFF(1:Rr,2) = $0/1
E: DIFF(1:R,1) = $1/1
ES: EXP(LN(1)) = 1
S: EXP(MUL:d(LN(1),2)) = POT(1,2)
E: INV(1) = POT(1,$-1/1)
ES: INV(INV(1)) = 1
E: INV(MUL(1,2)) = MUL(INV(1),INV(2))
E: INV(NEG(1)) = NEG(POT(1,$-1/1))
S: INV(NEG(1)) = NEG(INV(1))
E: INV(POT(1,2)) = POT(1,NEG(2))
ES: INVERT(INVERT(1)) = 1
ES: LN(EXP(1)) = 1
ES: LN(POT(1,2)) = MUL(2,LN(1))
E: LN(MUL(1,2)) = ADD(LN(1),LN(2))
E: LN(INV(1)) = NEG(LN(1))
E: LN(POT(1,$-1/1)) = NEG(LN(1))
E: LOG(1) = MUL(LN(1),INV(LN($10/1)))
ES: MUL($0/1,1) = $0/1
ES: MUL($1/1,1) = 1
ES: MUL(1,ABS(INV(1))) = SIGN(1)
E: MUL:c(1,ADD(2,3)) = ADD(MUL(1,2),MUL(1,3))
E: MUL:c(ADD(1,2),3) = ADD(MUL(1,3),MUL(2,3))
;ES: MUL:a(1:ac,MUL(2:ac,3)) = MUL(MUL(1,2),3)
;ES: MUL:a(1:Rb,MUL(2:Rac,3)) = MUL(2,MUL(1,3))
;ES: MUL:c(1:b,2:Ra) = MUL(2,1)
S: MUL:ac(1,MUL(2,INV(3))) = MUL(MUL(1,2),INV(3))
S: MUL:ca(MUL(1,INV(2)),INV(3)) = MUL(1,INV(MUL(2,3)))
S: MUL:ca(INV(1),2) = MUL(2,INV(1))
S: MUL(INV(1),INV(2)) = INV(MUL(1,2))
ES: MUL(NEG(1),2) = NEG(MUL(1,2))
S: MUL(COS(1),INV(SIN(1))) = COT(1)
S: MUL(COSH(1),INV(SINH(1))) = INV(TANH(1))
S: MUL(SIN(1),INV(COS(1))) = TAN(1)
S: MUL(SINH(1),INV(COSH(1))) = TANH(1)
ES: MUL(1,POT(1,2)) = POT(1,ADD($1/1,2))
ES: MUL(MUL:d(POT(1,2),3),1) = MUL(POT(1,ADD($1/1,2)),3)
ES: MUL(POT(1,2),MUL(POT(1,3),4)) = MUL(POT(1,ADD(2,3)),4)
S: MUL(POT(1,2),MUL(POT(3,2),4)) = MUL(POT(MUL(1,3),2),4)
ES: MUL:sa(1:RM,MUL(2:RM,3:RM)) = MUL(MUL(1,2),3)
ES: MUL:sa(MUL(1:R,2:R),MUL(3:R,4:R)) = MUL(MUL(MUL(1,2),3),4)
ES: NEG(NEG(1)) = 1
ES: NEG(ADD(1,2)) = ADD(NEG(1),NEG(2))
ES: POT(1,#0) = $1/1
S: POT(1,$-1/1) = INV(1)
ES: POT(1,$1/1) = 1
S: POT(1,$1/2) = SQRT(1)
S: POT(1,2:Ran)=INV(POT(1,NEG(2)))
S: POT(1,NEG(2)) = INV(POT(1,2))
E: POT(ADD(1,2),$2/1) = ADD(POT(1,$2/1),ADD(MUL($2/1,MUL(1,2)),POT(2,$2/1)))
E: POT(MUL(1,2),3) = MUL(POT(1,3),POT(2,3))
ES: POT(NEG(1),2:Rae) = POT(1,2)
ES: POT(NEG(1),2:Rao) = NEG(POT(1,2))
ES: POT(POT(1,2),3) = POT(1,MUL(2,3))
ES: SIN(ASIN(1)) = 1
ES: SIN(NEG(1)) = NEG(SIN(1))
E: SIN(ADD(1,2)) = ADD(MUL(SIN(1),COS(2)),MUL(COS(1),SIN(2)))
ES: SINH(ASINH(1)) = 1
ES: SINH(NEG(1)) = NEG(SINH(1))
E: SINH(ADD(1,2)) = ADD(MUL(SINH(1),COSH(2)),MUL(COSH(1),SINH(2)))
E: SQRT(1) = POT(1,$1/2)
E: TAN(1) = MUL(SIN(1),INV(COS(1)))
ES: TAN(ATAN(1)) = 1
ES: TANH(ATAN(1)) = 1